home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
scrnmasm.arc
/
RESTORE.MAC
< prev
next >
Wrap
Text File
|
1988-11-20
|
2KB
|
51 lines
;;
;; This MACRO will Pop a series of registers in reverse order. This means
;; that the listing to outward appearances looks the same as the SAVE
;; macro and gives less chances toward errors.
;;
Restore Macro Reg1,Reg2,Reg3,Reg4,Reg5,Reg6,Reg7,Reg8,Reg9,Reg10,Reg11,Reg12
IFB <Reg1>
IF2
%Out Missing Arguments in RESTORE macro
.Err
ExitM
EndIf
EndIf
IFNB <Reg12>
Pop Reg12 ; Restore Register
EndIf
IFNB <Reg11>
Pop Reg11 ; Restore Register
EndIf
IFNB <Reg10>
Pop Reg10 ; Restore Register
EndIf
IFNB <Reg9>
Pop Reg9 ; Restore Register
EndIf
IFNB <Reg8>
Pop Reg8 ; Restore Register
EndIf
IFNB <Reg7>
Pop Reg7 ; Restore Register
EndIf
IFNB <Reg6>
Pop Reg6 ; Restore Register
EndIf
IFNB <Reg5>
Pop Reg5 ; Restore Register
EndIf
IFNB <Reg4>
Pop Reg4 ; Restore Register
EndIf
IFNB <Reg3>
Pop Reg3 ; Restore Register
EndIf
IFNB <Reg2>
Pop Reg2 ; Restore Register
EndIf
IFNB <Reg1>
Pop Reg1 ; Restore Register
EndIf
EndM